home *** CD-ROM | disk | FTP | other *** search
/ Inter.Net 55-1 / Inter.Net 55-1.iso / CBuilder / Setup / BCB / data.z / messages.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1998-02-09  |  41.8 KB  |  1,720 lines
  1.  
  2. {*******************************************************}
  3. {                                                       }
  4. {       Delphi Runtime Library                          }
  5. {       Windows Messages and Types                      }
  6. {                                                       }
  7. {       Copyright (c) 1991,98 Borland International     }
  8. {                                                       }
  9. {*******************************************************}
  10.  
  11. unit Messages;
  12.  
  13. {$A-}
  14. {$WEAKPACKAGEUNIT}
  15.  
  16. interface
  17.  
  18. uses Windows;
  19.  
  20. { Window Messages }
  21.  
  22. const
  23.   {$EXTERNALSYM WM_NULL}
  24.   WM_NULL             = $0000;
  25.   {$EXTERNALSYM WM_CREATE}
  26.   WM_CREATE           = $0001;
  27.   {$EXTERNALSYM WM_DESTROY}
  28.   WM_DESTROY          = $0002;
  29.   {$EXTERNALSYM WM_MOVE}
  30.   WM_MOVE             = $0003;
  31.   {$EXTERNALSYM WM_SIZE}
  32.   WM_SIZE             = $0005;
  33.   {$EXTERNALSYM WM_ACTIVATE}
  34.   WM_ACTIVATE         = $0006;
  35.   {$EXTERNALSYM WM_SETFOCUS}
  36.   WM_SETFOCUS         = $0007;
  37.   {$EXTERNALSYM WM_KILLFOCUS}
  38.   WM_KILLFOCUS        = $0008;
  39.   {$EXTERNALSYM WM_ENABLE}
  40.   WM_ENABLE           = $000A;
  41.   {$EXTERNALSYM WM_SETREDRAW}
  42.   WM_SETREDRAW        = $000B;
  43.   {$EXTERNALSYM WM_SETTEXT}
  44.   WM_SETTEXT          = $000C;
  45.   {$EXTERNALSYM WM_GETTEXT}
  46.   WM_GETTEXT          = $000D;
  47.   {$EXTERNALSYM WM_GETTEXTLENGTH}
  48.   WM_GETTEXTLENGTH    = $000E;
  49.   {$EXTERNALSYM WM_PAINT}
  50.   WM_PAINT            = $000F;
  51.   {$EXTERNALSYM WM_CLOSE}
  52.   WM_CLOSE            = $0010;
  53.   {$EXTERNALSYM WM_QUERYENDSESSION}
  54.   WM_QUERYENDSESSION  = $0011;
  55.   {$EXTERNALSYM WM_QUIT}
  56.   WM_QUIT             = $0012;
  57.   {$EXTERNALSYM WM_QUERYOPEN}
  58.   WM_QUERYOPEN        = $0013;
  59.   {$EXTERNALSYM WM_ERASEBKGND}
  60.   WM_ERASEBKGND       = $0014;
  61.   {$EXTERNALSYM WM_SYSCOLORCHANGE}
  62.   WM_SYSCOLORCHANGE   = $0015;
  63.   {$EXTERNALSYM WM_ENDSESSION}
  64.   WM_ENDSESSION       = $0016;
  65.   {$EXTERNALSYM WM_SYSTEMERROR}
  66.   WM_SYSTEMERROR      = $0017;
  67.   {$EXTERNALSYM WM_SHOWWINDOW}
  68.   WM_SHOWWINDOW       = $0018;
  69.   {$EXTERNALSYM WM_CTLCOLOR}
  70.   WM_CTLCOLOR         = $0019;
  71.   {$EXTERNALSYM WM_WININICHANGE}
  72.   WM_WININICHANGE     = $001A;
  73.   {$EXTERNALSYM WM_SETTINGCHANGE}
  74.   WM_SETTINGCHANGE = WM_WININICHANGE;
  75.   {$EXTERNALSYM WM_DEVMODECHANGE}
  76.   WM_DEVMODECHANGE    = $001B;
  77.   {$EXTERNALSYM WM_ACTIVATEAPP}
  78.   WM_ACTIVATEAPP      = $001C;
  79.   {$EXTERNALSYM WM_FONTCHANGE}
  80.   WM_FONTCHANGE       = $001D;
  81.   {$EXTERNALSYM WM_TIMECHANGE}
  82.   WM_TIMECHANGE       = $001E;
  83.   {$EXTERNALSYM WM_CANCELMODE}
  84.   WM_CANCELMODE       = $001F;
  85.   {$EXTERNALSYM WM_SETCURSOR}
  86.   WM_SETCURSOR        = $0020;
  87.   {$EXTERNALSYM WM_MOUSEACTIVATE}
  88.   WM_MOUSEACTIVATE    = $0021;
  89.   {$EXTERNALSYM WM_CHILDACTIVATE}
  90.   WM_CHILDACTIVATE    = $0022;
  91.   {$EXTERNALSYM WM_QUEUESYNC}
  92.   WM_QUEUESYNC        = $0023;
  93.   {$EXTERNALSYM WM_GETMINMAXINFO}
  94.   WM_GETMINMAXINFO    = $0024;
  95.   {$EXTERNALSYM WM_PAINTICON}
  96.   WM_PAINTICON        = $0026;
  97.   {$EXTERNALSYM WM_ICONERASEBKGND}
  98.   WM_ICONERASEBKGND   = $0027;
  99.   {$EXTERNALSYM WM_NEXTDLGCTL}
  100.   WM_NEXTDLGCTL       = $0028;
  101.   {$EXTERNALSYM WM_SPOOLERSTATUS}
  102.   WM_SPOOLERSTATUS    = $002A;
  103.   {$EXTERNALSYM WM_DRAWITEM}
  104.   WM_DRAWITEM         = $002B;
  105.   {$EXTERNALSYM WM_MEASUREITEM}
  106.   WM_MEASUREITEM      = $002C;
  107.   {$EXTERNALSYM WM_DELETEITEM}
  108.   WM_DELETEITEM       = $002D;
  109.   {$EXTERNALSYM WM_VKEYTOITEM}
  110.   WM_VKEYTOITEM       = $002E;
  111.   {$EXTERNALSYM WM_CHARTOITEM}
  112.   WM_CHARTOITEM       = $002F;
  113.   {$EXTERNALSYM WM_SETFONT}
  114.   WM_SETFONT          = $0030;
  115.   {$EXTERNALSYM WM_GETFONT}
  116.   WM_GETFONT          = $0031;
  117.   {$EXTERNALSYM WM_SETHOTKEY}
  118.   WM_SETHOTKEY        = $0032;
  119.   {$EXTERNALSYM WM_GETHOTKEY}
  120.   WM_GETHOTKEY        = $0033;
  121.   {$EXTERNALSYM WM_QUERYDRAGICON}
  122.   WM_QUERYDRAGICON    = $0037;
  123.   {$EXTERNALSYM WM_COMPAREITEM}
  124.   WM_COMPAREITEM      = $0039;
  125.   {$EXTERNALSYM WM_COMPACTING}
  126.   WM_COMPACTING       = $0041;
  127.  
  128.   {$EXTERNALSYM WM_COMMNOTIFY}
  129.   WM_COMMNOTIFY       = $0044;    { obsolete in Win32}
  130.  
  131.   {$EXTERNALSYM WM_WINDOWPOSCHANGING}
  132.   WM_WINDOWPOSCHANGING = $0046;
  133.   {$EXTERNALSYM WM_WINDOWPOSCHANGED}
  134.   WM_WINDOWPOSCHANGED = $0047;
  135.   {$EXTERNALSYM WM_POWER}
  136.   WM_POWER            = $0048;
  137.  
  138.   {$EXTERNALSYM WM_COPYDATA}
  139.   WM_COPYDATA         = $004A;
  140.   {$EXTERNALSYM WM_CANCELJOURNAL}
  141.   WM_CANCELJOURNAL    = $004B;
  142.   {$EXTERNALSYM WM_NOTIFY}
  143.   WM_NOTIFY           = $004E;
  144.   {$EXTERNALSYM WM_INPUTLANGCHANGEREQUEST}
  145.   WM_INPUTLANGCHANGEREQUEST = $0050;
  146.   {$EXTERNALSYM WM_INPUTLANGCHANGE}
  147.   WM_INPUTLANGCHANGE  = $0051;
  148.   {$EXTERNALSYM WM_TCARD}
  149.   WM_TCARD            = $0052;
  150.   {$EXTERNALSYM WM_HELP}
  151.   WM_HELP             = $0053;
  152.   {$EXTERNALSYM WM_USERCHANGED}
  153.   WM_USERCHANGED      = $0054;
  154.   {$EXTERNALSYM WM_NOTIFYFORMAT}
  155.   WM_NOTIFYFORMAT     = $0055;
  156.  
  157.   {$EXTERNALSYM WM_CONTEXTMENU}
  158.   WM_CONTEXTMENU      = $007B;
  159.   {$EXTERNALSYM WM_STYLECHANGING}
  160.   WM_STYLECHANGING    = $007C;
  161.   {$EXTERNALSYM WM_STYLECHANGED}
  162.   WM_STYLECHANGED     = $007D;
  163.   {$EXTERNALSYM WM_DISPLAYCHANGE}
  164.   WM_DISPLAYCHANGE    = $007E;
  165.   {$EXTERNALSYM WM_GETICON}
  166.   WM_GETICON          = $007F;
  167.   {$EXTERNALSYM WM_SETICON}
  168.   WM_SETICON          = $0080;
  169.  
  170.   {$EXTERNALSYM WM_NCCREATE}
  171.   WM_NCCREATE         = $0081;
  172.   {$EXTERNALSYM WM_NCDESTROY}
  173.   WM_NCDESTROY        = $0082;
  174.   {$EXTERNALSYM WM_NCCALCSIZE}
  175.   WM_NCCALCSIZE       = $0083;
  176.   {$EXTERNALSYM WM_NCHITTEST}
  177.   WM_NCHITTEST        = $0084;
  178.   {$EXTERNALSYM WM_NCPAINT}
  179.   WM_NCPAINT          = $0085;
  180.   {$EXTERNALSYM WM_NCACTIVATE}
  181.   WM_NCACTIVATE       = $0086;
  182.   {$EXTERNALSYM WM_GETDLGCODE}
  183.   WM_GETDLGCODE       = $0087;
  184.   {$EXTERNALSYM WM_NCMOUSEMOVE}
  185.   WM_NCMOUSEMOVE      = $00A0;
  186.   {$EXTERNALSYM WM_NCLBUTTONDOWN}
  187.   WM_NCLBUTTONDOWN    = $00A1;
  188.   {$EXTERNALSYM WM_NCLBUTTONUP}
  189.   WM_NCLBUTTONUP      = $00A2;
  190.   {$EXTERNALSYM WM_NCLBUTTONDBLCLK}
  191.   WM_NCLBUTTONDBLCLK  = $00A3;
  192.   {$EXTERNALSYM WM_NCRBUTTONDOWN}
  193.   WM_NCRBUTTONDOWN    = $00A4;
  194.   {$EXTERNALSYM WM_NCRBUTTONUP}
  195.   WM_NCRBUTTONUP      = $00A5;
  196.   {$EXTERNALSYM WM_NCRBUTTONDBLCLK}
  197.   WM_NCRBUTTONDBLCLK  = $00A6;
  198.   {$EXTERNALSYM WM_NCMBUTTONDOWN}
  199.   WM_NCMBUTTONDOWN    = $00A7;
  200.   {$EXTERNALSYM WM_NCMBUTTONUP}
  201.   WM_NCMBUTTONUP      = $00A8;
  202.   {$EXTERNALSYM WM_NCMBUTTONDBLCLK}
  203.   WM_NCMBUTTONDBLCLK  = $00A9;
  204.  
  205.   {$EXTERNALSYM WM_KEYFIRST}
  206.   WM_KEYFIRST         = $0100;
  207.   {$EXTERNALSYM WM_KEYDOWN}
  208.   WM_KEYDOWN          = $0100;
  209.   {$EXTERNALSYM WM_KEYUP}
  210.   WM_KEYUP            = $0101;
  211.   {$EXTERNALSYM WM_CHAR}
  212.   WM_CHAR             = $0102;
  213.   {$EXTERNALSYM WM_DEADCHAR}
  214.   WM_DEADCHAR         = $0103;
  215.   {$EXTERNALSYM WM_SYSKEYDOWN}
  216.   WM_SYSKEYDOWN       = $0104;
  217.   {$EXTERNALSYM WM_SYSKEYUP}
  218.   WM_SYSKEYUP         = $0105;
  219.   {$EXTERNALSYM WM_SYSCHAR}
  220.   WM_SYSCHAR          = $0106;
  221.   {$EXTERNALSYM WM_SYSDEADCHAR}
  222.   WM_SYSDEADCHAR      = $0107;
  223.   {$EXTERNALSYM WM_KEYLAST}
  224.   WM_KEYLAST          = $0108;
  225.  
  226.   {$EXTERNALSYM WM_INITDIALOG}
  227.   WM_INITDIALOG       = $0110;
  228.   {$EXTERNALSYM WM_COMMAND}
  229.   WM_COMMAND          = $0111;
  230.   {$EXTERNALSYM WM_SYSCOMMAND}
  231.   WM_SYSCOMMAND       = $0112;
  232.   {$EXTERNALSYM WM_TIMER}
  233.   WM_TIMER            = $0113;
  234.   {$EXTERNALSYM WM_HSCROLL}
  235.   WM_HSCROLL          = $0114;
  236.   {$EXTERNALSYM WM_VSCROLL}
  237.   WM_VSCROLL          = $0115;
  238.   {$EXTERNALSYM WM_INITMENU}
  239.   WM_INITMENU         = $0116;
  240.   {$EXTERNALSYM WM_INITMENUPOPUP}
  241.   WM_INITMENUPOPUP    = $0117;
  242.   {$EXTERNALSYM WM_MENUSELECT}
  243.   WM_MENUSELECT       = $011F;
  244.   {$EXTERNALSYM WM_MENUCHAR}
  245.   WM_MENUCHAR         = $0120;
  246.   {$EXTERNALSYM WM_ENTERIDLE}
  247.   WM_ENTERIDLE        = $0121;
  248.  
  249.   {$EXTERNALSYM WM_CTLCOLORMSGBOX}
  250.   WM_CTLCOLORMSGBOX   = $0132;
  251.   {$EXTERNALSYM WM_CTLCOLOREDIT}
  252.   WM_CTLCOLOREDIT     = $0133;
  253.   {$EXTERNALSYM WM_CTLCOLORLISTBOX}
  254.   WM_CTLCOLORLISTBOX  = $0134;
  255.   {$EXTERNALSYM WM_CTLCOLORBTN}
  256.   WM_CTLCOLORBTN      = $0135;
  257.   {$EXTERNALSYM WM_CTLCOLORDLG}
  258.   WM_CTLCOLORDLG      = $0136;
  259.   {$EXTERNALSYM WM_CTLCOLORSCROLLBAR}
  260.   WM_CTLCOLORSCROLLBAR= $0137;
  261.   {$EXTERNALSYM WM_CTLCOLORSTATIC}
  262.   WM_CTLCOLORSTATIC   = $0138;
  263.  
  264.   {$EXTERNALSYM WM_MOUSEFIRST}
  265.   WM_MOUSEFIRST       = $0200;
  266.   {$EXTERNALSYM WM_MOUSEMOVE}
  267.   WM_MOUSEMOVE        = $0200;
  268.   {$EXTERNALSYM WM_LBUTTONDOWN}
  269.   WM_LBUTTONDOWN      = $0201;
  270.   {$EXTERNALSYM WM_LBUTTONUP}
  271.   WM_LBUTTONUP        = $0202;
  272.   {$EXTERNALSYM WM_LBUTTONDBLCLK}
  273.   WM_LBUTTONDBLCLK    = $0203;
  274.   {$EXTERNALSYM WM_RBUTTONDOWN}
  275.   WM_RBUTTONDOWN      = $0204;
  276.   {$EXTERNALSYM WM_RBUTTONUP}
  277.   WM_RBUTTONUP        = $0205;
  278.   {$EXTERNALSYM WM_RBUTTONDBLCLK}
  279.   WM_RBUTTONDBLCLK    = $0206;
  280.   {$EXTERNALSYM WM_MBUTTONDOWN}
  281.   WM_MBUTTONDOWN      = $0207;
  282.   {$EXTERNALSYM WM_MBUTTONUP}
  283.   WM_MBUTTONUP        = $0208;
  284.   {$EXTERNALSYM WM_MBUTTONDBLCLK}
  285.   WM_MBUTTONDBLCLK    = $0209;
  286.   {$EXTERNALSYM WM_MOUSEWHEEL}
  287.   WM_MOUSEWHEEL       = $020A; 
  288.   {$EXTERNALSYM WM_MOUSELAST}
  289.   WM_MOUSELAST        = $020A;
  290.  
  291.   {$EXTERNALSYM WM_PARENTNOTIFY}
  292.   WM_PARENTNOTIFY     = $0210;
  293.   {$EXTERNALSYM WM_ENTERMENULOOP}
  294.   WM_ENTERMENULOOP    = $0211;
  295.   {$EXTERNALSYM WM_EXITMENULOOP}
  296.   WM_EXITMENULOOP     = $0212;
  297.   {$EXTERNALSYM WM_NEXTMENU}
  298.   WM_NEXTMENU         = $0213;
  299.  
  300.   {$EXTERNALSYM WM_SIZING}
  301.   WM_SIZING           = 532;
  302.   {$EXTERNALSYM WM_CAPTURECHANGED}
  303.   WM_CAPTURECHANGED   = 533;
  304.   {$EXTERNALSYM WM_MOVING}
  305.   WM_MOVING           = 534;
  306.   {$EXTERNALSYM WM_POWERBROADCAST}
  307.   WM_POWERBROADCAST   = 536;
  308.   {$EXTERNALSYM WM_DEVICECHANGE}
  309.   WM_DEVICECHANGE     = 537;
  310.  
  311.   {$EXTERNALSYM WM_IME_STARTCOMPOSITION}
  312.   WM_IME_STARTCOMPOSITION        = $010D;
  313.   {$EXTERNALSYM WM_IME_ENDCOMPOSITION}
  314.   WM_IME_ENDCOMPOSITION          = $010E;
  315.   {$EXTERNALSYM WM_IME_COMPOSITION}
  316.   WM_IME_COMPOSITION             = $010F;
  317.   {$EXTERNALSYM WM_IME_KEYLAST}
  318.   WM_IME_KEYLAST                 = $010F;
  319.  
  320.   {$EXTERNALSYM WM_IME_SETCONTEXT}
  321.   WM_IME_SETCONTEXT              = $0281;
  322.   {$EXTERNALSYM WM_IME_NOTIFY}
  323.   WM_IME_NOTIFY                  = $0282;
  324.   {$EXTERNALSYM WM_IME_CONTROL}
  325.   WM_IME_CONTROL                 = $0283;
  326.   {$EXTERNALSYM WM_IME_COMPOSITIONFULL}
  327.   WM_IME_COMPOSITIONFULL         = $0284;
  328.   {$EXTERNALSYM WM_IME_SELECT}
  329.   WM_IME_SELECT                  = $0285;
  330.   {$EXTERNALSYM WM_IME_CHAR}
  331.   WM_IME_CHAR                    = $0286;
  332.  
  333.   {$EXTERNALSYM WM_IME_KEYDOWN}
  334.   WM_IME_KEYDOWN                 = $0290;
  335.   {$EXTERNALSYM WM_IME_KEYUP}
  336.   WM_IME_KEYUP                   = $0291;
  337.  
  338.   {$EXTERNALSYM WM_MDICREATE}
  339.   WM_MDICREATE        = $0220;
  340.   {$EXTERNALSYM WM_MDIDESTROY}
  341.   WM_MDIDESTROY       = $0221;
  342.   {$EXTERNALSYM WM_MDIACTIVATE}
  343.   WM_MDIACTIVATE      = $0222;
  344.   {$EXTERNALSYM WM_MDIRESTORE}
  345.   WM_MDIRESTORE       = $0223;
  346.   {$EXTERNALSYM WM_MDINEXT}
  347.   WM_MDINEXT          = $0224;
  348.   {$EXTERNALSYM WM_MDIMAXIMIZE}
  349.   WM_MDIMAXIMIZE      = $0225;
  350.   {$EXTERNALSYM WM_MDITILE}
  351.   WM_MDITILE          = $0226;
  352.   {$EXTERNALSYM WM_MDICASCADE}
  353.   WM_MDICASCADE       = $0227;
  354.   {$EXTERNALSYM WM_MDIICONARRANGE}
  355.   WM_MDIICONARRANGE   = $0228;
  356.   {$EXTERNALSYM WM_MDIGETACTIVE}
  357.   WM_MDIGETACTIVE     = $0229;
  358.   {$EXTERNALSYM WM_MDISETMENU}
  359.   WM_MDISETMENU       = $0230;
  360.  
  361.   {$EXTERNALSYM WM_ENTERSIZEMOVE}
  362.   WM_ENTERSIZEMOVE    = $0231;
  363.   {$EXTERNALSYM WM_EXITSIZEMOVE}
  364.   WM_EXITSIZEMOVE     = $0232;
  365.   {$EXTERNALSYM WM_DROPFILES}
  366.   WM_DROPFILES        = $0233;
  367.   {$EXTERNALSYM WM_MDIREFRESHMENU}
  368.   WM_MDIREFRESHMENU   = $0234;
  369.  
  370.   {$EXTERNALSYM WM_MOUSEHOVER}
  371.   WM_MOUSEHOVER       = $02A1; 
  372.   {$EXTERNALSYM WM_MOUSELEAVE}
  373.   WM_MOUSELEAVE       = $02A3;
  374.  
  375.   {$EXTERNALSYM WM_CUT}
  376.   WM_CUT              = $0300;
  377.   {$EXTERNALSYM WM_COPY}
  378.   WM_COPY             = $0301;
  379.   {$EXTERNALSYM WM_PASTE}
  380.   WM_PASTE            = $0302;
  381.   {$EXTERNALSYM WM_CLEAR}
  382.   WM_CLEAR            = $0303;
  383.   {$EXTERNALSYM WM_UNDO}
  384.   WM_UNDO             = $0304;
  385.   {$EXTERNALSYM WM_RENDERFORMAT}
  386.   WM_RENDERFORMAT     = $0305;
  387.   {$EXTERNALSYM WM_RENDERALLFORMATS}
  388.   WM_RENDERALLFORMATS = $0306;
  389.   {$EXTERNALSYM WM_DESTROYCLIPBOARD}
  390.   WM_DESTROYCLIPBOARD = $0307;
  391.   {$EXTERNALSYM WM_DRAWCLIPBOARD}
  392.   WM_DRAWCLIPBOARD    = $0308;
  393.   {$EXTERNALSYM WM_PAINTCLIPBOARD}
  394.   WM_PAINTCLIPBOARD   = $0309;
  395.   {$EXTERNALSYM WM_VSCROLLCLIPBOARD}
  396.   WM_VSCROLLCLIPBOARD = $030A;
  397.   {$EXTERNALSYM WM_SIZECLIPBOARD}
  398.   WM_SIZECLIPBOARD    = $030B;
  399.   {$EXTERNALSYM WM_ASKCBFORMATNAME}
  400.   WM_ASKCBFORMATNAME  = $030C;
  401.   {$EXTERNALSYM WM_CHANGECBCHAIN}
  402.   WM_CHANGECBCHAIN    = $030D;
  403.   {$EXTERNALSYM WM_HSCROLLCLIPBOARD}
  404.   WM_HSCROLLCLIPBOARD = $030E;
  405.   {$EXTERNALSYM WM_QUERYNEWPALETTE}
  406.   WM_QUERYNEWPALETTE  = $030F;
  407.   {$EXTERNALSYM WM_PALETTEISCHANGING}
  408.   WM_PALETTEISCHANGING= $0310;
  409.   {$EXTERNALSYM WM_PALETTECHANGED}
  410.   WM_PALETTECHANGED   = $0311;
  411.   {$EXTERNALSYM WM_HOTKEY}
  412.   WM_HOTKEY           = $0312;
  413.  
  414.   {$EXTERNALSYM WM_PRINT}
  415.   WM_PRINT            = 791;
  416.   {$EXTERNALSYM WM_PRINTCLIENT}
  417.   WM_PRINTCLIENT      = 792;
  418.  
  419.   {$EXTERNALSYM WM_HANDHELDFIRST}
  420.   WM_HANDHELDFIRST    = 856;
  421.   {$EXTERNALSYM WM_HANDHELDLAST}
  422.   WM_HANDHELDLAST     = 863;
  423.  
  424.   {$EXTERNALSYM WM_PENWINFIRST}
  425.   WM_PENWINFIRST      = $0380;
  426.   {$EXTERNALSYM WM_PENWINLAST}
  427.   WM_PENWINLAST       = $038F;
  428.  
  429.   {$EXTERNALSYM WM_COALESCE_FIRST}
  430.   WM_COALESCE_FIRST   = $0390;
  431.   {$EXTERNALSYM WM_COALESCE_LAST}
  432.   WM_COALESCE_LAST    = $039F;
  433.  
  434.   {$EXTERNALSYM WM_DDE_FIRST}
  435.   WM_DDE_FIRST        = $03E0;
  436.   {$EXTERNALSYM WM_DDE_INITIATE}
  437.   WM_DDE_INITIATE     = WM_DDE_FIRST + 0;
  438.   {$EXTERNALSYM WM_DDE_TERMINATE}
  439.   WM_DDE_TERMINATE    = WM_DDE_FIRST + 1;
  440.   {$EXTERNALSYM WM_DDE_ADVISE}
  441.   WM_DDE_ADVISE       = WM_DDE_FIRST + 2;
  442.   {$EXTERNALSYM WM_DDE_UNADVISE}
  443.   WM_DDE_UNADVISE     = WM_DDE_FIRST + 3;
  444.   {$EXTERNALSYM WM_DDE_ACK}
  445.   WM_DDE_ACK          = WM_DDE_FIRST + 4;
  446.   {$EXTERNALSYM WM_DDE_DATA}
  447.   WM_DDE_DATA         = WM_DDE_FIRST + 5;
  448.   {$EXTERNALSYM WM_DDE_REQUEST}
  449.   WM_DDE_REQUEST      = WM_DDE_FIRST + 6;
  450.   {$EXTERNALSYM WM_DDE_POKE}
  451.   WM_DDE_POKE         = WM_DDE_FIRST + 7;
  452.   {$EXTERNALSYM WM_DDE_EXECUTE}
  453.   WM_DDE_EXECUTE      = WM_DDE_FIRST + 8;
  454.   {$EXTERNALSYM WM_DDE_LAST}
  455.   WM_DDE_LAST         = WM_DDE_FIRST + 8;
  456.  
  457.   {$EXTERNALSYM WM_APP}
  458.   WM_APP = $8000;
  459.  
  460. { NOTE: All Message Numbers below 0x0400 are RESERVED }
  461.  
  462. { Private Window Messages Start Here }
  463.  
  464.   {$EXTERNALSYM WM_USER}
  465.   WM_USER             = $0400;
  466.  
  467. { Button Notification Codes }
  468.  
  469. const
  470.   {$EXTERNALSYM BN_CLICKED}
  471.   BN_CLICKED       = 0;
  472.   {$EXTERNALSYM BN_PAINT}
  473.   BN_PAINT         = 1;
  474.   {$EXTERNALSYM BN_HILITE}
  475.   BN_HILITE        = 2;
  476.   {$EXTERNALSYM BN_UNHILITE}
  477.   BN_UNHILITE      = 3;
  478.   {$EXTERNALSYM BN_DISABLE}
  479.   BN_DISABLE       = 4;
  480.   {$EXTERNALSYM BN_DOUBLECLICKED}
  481.   BN_DOUBLECLICKED = 5;
  482.   {$EXTERNALSYM BN_PUSHED}
  483.   BN_PUSHED = BN_HILITE;
  484.   {$EXTERNALSYM BN_UNPUSHED}
  485.   BN_UNPUSHED = BN_UNHILITE;
  486.   {$EXTERNALSYM BN_DBLCLK}
  487.   BN_DBLCLK = BN_DOUBLECLICKED;
  488.   {$EXTERNALSYM BN_SETFOCUS}
  489.   BN_SETFOCUS = 6;
  490.   {$EXTERNALSYM BN_KILLFOCUS}
  491.   BN_KILLFOCUS = 7;
  492.  
  493. { Button Control Messages }
  494. const
  495.   {$EXTERNALSYM BM_GETCHECK}
  496.   BM_GETCHECK = $00F0;
  497.   {$EXTERNALSYM BM_SETCHECK}
  498.   BM_SETCHECK = $00F1;
  499.   {$EXTERNALSYM BM_GETSTATE}
  500.   BM_GETSTATE = $00F2;
  501.   {$EXTERNALSYM BM_SETSTATE}
  502.   BM_SETSTATE = $00F3;
  503.   {$EXTERNALSYM BM_SETSTYLE}
  504.   BM_SETSTYLE = $00F4;
  505.   {$EXTERNALSYM BM_CLICK}
  506.   BM_CLICK    = $00F5;
  507.   {$EXTERNALSYM BM_GETIMAGE}
  508.   BM_GETIMAGE = $00F6;
  509.   {$EXTERNALSYM BM_SETIMAGE}
  510.   BM_SETIMAGE = $00F7;
  511.  
  512. { Listbox Notification Codes }
  513.  
  514. const
  515.   {$EXTERNALSYM LBN_ERRSPACE}
  516.   LBN_ERRSPACE  = (-2);
  517.   {$EXTERNALSYM LBN_SELCHANGE}
  518.   LBN_SELCHANGE = 1;
  519.   {$EXTERNALSYM LBN_DBLCLK}
  520.   LBN_DBLCLK    = 2;
  521.   {$EXTERNALSYM LBN_SELCANCEL}
  522.   LBN_SELCANCEL = 3;
  523.   {$EXTERNALSYM LBN_SETFOCUS}
  524.   LBN_SETFOCUS  = 4;
  525.   {$EXTERNALSYM LBN_KILLFOCUS}
  526.   LBN_KILLFOCUS = 5;
  527.  
  528. { Listbox messages }
  529.  
  530. const
  531.   {$EXTERNALSYM LB_ADDSTRING}
  532.   LB_ADDSTRING            = $0180;
  533.   {$EXTERNALSYM LB_INSERTSTRING}
  534.   LB_INSERTSTRING         = $0181;
  535.   {$EXTERNALSYM LB_DELETESTRING}
  536.   LB_DELETESTRING         = $0182;
  537.   {$EXTERNALSYM LB_SELITEMRANGEEX}
  538.   LB_SELITEMRANGEEX       = $0183;
  539.   {$EXTERNALSYM LB_RESETCONTENT}
  540.   LB_RESETCONTENT         = $0184;
  541.   {$EXTERNALSYM LB_SETSEL}
  542.   LB_SETSEL               = $0185;
  543.   {$EXTERNALSYM LB_SETCURSEL}
  544.   LB_SETCURSEL            = $0186;
  545.   {$EXTERNALSYM LB_GETSEL}
  546.   LB_GETSEL               = $0187;
  547.   {$EXTERNALSYM LB_GETCURSEL}
  548.   LB_GETCURSEL            = $0188;
  549.   {$EXTERNALSYM LB_GETTEXT}
  550.   LB_GETTEXT              = $0189;
  551.   {$EXTERNALSYM LB_GETTEXTLEN}
  552.   LB_GETTEXTLEN           = $018A;
  553.   {$EXTERNALSYM LB_GETCOUNT}
  554.   LB_GETCOUNT             = $018B;
  555.   {$EXTERNALSYM LB_SELECTSTRING}
  556.   LB_SELECTSTRING         = $018C;
  557.   {$EXTERNALSYM LB_DIR}
  558.   LB_DIR                  = $018D;
  559.   {$EXTERNALSYM LB_GETTOPINDEX}
  560.   LB_GETTOPINDEX          = $018E;
  561.   {$EXTERNALSYM LB_FINDSTRING}
  562.   LB_FINDSTRING           = $018F;
  563.   {$EXTERNALSYM LB_GETSELCOUNT}
  564.   LB_GETSELCOUNT          = $0190;
  565.   {$EXTERNALSYM LB_GETSELITEMS}
  566.   LB_GETSELITEMS          = $0191;
  567.   {$EXTERNALSYM LB_SETTABSTOPS}
  568.   LB_SETTABSTOPS          = $0192;
  569.   {$EXTERNALSYM LB_GETHORIZONTALEXTENT}
  570.   LB_GETHORIZONTALEXTENT  = $0193;
  571.   {$EXTERNALSYM LB_SETHORIZONTALEXTENT}
  572.   LB_SETHORIZONTALEXTENT  = $0194;
  573.   {$EXTERNALSYM LB_SETCOLUMNWIDTH}
  574.   LB_SETCOLUMNWIDTH       = $0195;
  575.   {$EXTERNALSYM LB_ADDFILE}
  576.   LB_ADDFILE              = $0196;
  577.   {$EXTERNALSYM LB_SETTOPINDEX}
  578.   LB_SETTOPINDEX          = $0197;
  579.   {$EXTERNALSYM LB_GETITEMRECT}
  580.   LB_GETITEMRECT          = $0198;
  581.   {$EXTERNALSYM LB_GETITEMDATA}
  582.   LB_GETITEMDATA          = $0199;
  583.   {$EXTERNALSYM LB_SETITEMDATA}
  584.   LB_SETITEMDATA          = $019A;
  585.   {$EXTERNALSYM LB_SELITEMRANGE}
  586.   LB_SELITEMRANGE         = $019B;
  587.   {$EXTERNALSYM LB_SETANCHORINDEX}
  588.   LB_SETANCHORINDEX       = $019C;
  589.   {$EXTERNALSYM LB_GETANCHORINDEX}
  590.   LB_GETANCHORINDEX       = $019D;
  591.   {$EXTERNALSYM LB_SETCARETINDEX}
  592.   LB_SETCARETINDEX        = $019E;
  593.   {$EXTERNALSYM LB_GETCARETINDEX}
  594.   LB_GETCARETINDEX        = $019F;
  595.   {$EXTERNALSYM LB_SETITEMHEIGHT}
  596.   LB_SETITEMHEIGHT        = $01A0;
  597.   {$EXTERNALSYM LB_GETITEMHEIGHT}
  598.   LB_GETITEMHEIGHT        = $01A1;
  599.   {$EXTERNALSYM LB_FINDSTRINGEXACT}
  600.   LB_FINDSTRINGEXACT      = $01A2;
  601.   {$EXTERNALSYM LB_SETLOCALE}
  602.   LB_SETLOCALE            = $01A5;
  603.   {$EXTERNALSYM LB_GETLOCALE}
  604.   LB_GETLOCALE            = $01A6;
  605.   {$EXTERNALSYM LB_SETCOUNT}
  606.   LB_SETCOUNT             = $01A7;
  607.   {$EXTERNALSYM LB_INITSTORAGE}
  608.   LB_INITSTORAGE          = $01A8;
  609.   {$EXTERNALSYM LB_ITEMFROMPOINT}
  610.   LB_ITEMFROMPOINT        = $01A9;
  611.   {$EXTERNALSYM LB_MSGMAX}
  612.   LB_MSGMAX               = 432;
  613.  
  614. { Combo Box Notification Codes }
  615.  
  616. const
  617.   {$EXTERNALSYM CBN_ERRSPACE}
  618.   CBN_ERRSPACE   = (-1);
  619.   {$EXTERNALSYM CBN_SELCHANGE}
  620.   CBN_SELCHANGE  = 1;
  621.   {$EXTERNALSYM CBN_DBLCLK}
  622.   CBN_DBLCLK     = 2;
  623.   {$EXTERNALSYM CBN_SETFOCUS}
  624.   CBN_SETFOCUS   = 3;
  625.   {$EXTERNALSYM CBN_KILLFOCUS}
  626.   CBN_KILLFOCUS  = 4;
  627.   {$EXTERNALSYM CBN_EDITCHANGE}
  628.   CBN_EDITCHANGE = 5;
  629.   {$EXTERNALSYM CBN_EDITUPDATE}
  630.   CBN_EDITUPDATE = 6;
  631.   {$EXTERNALSYM CBN_DROPDOWN}
  632.   CBN_DROPDOWN   = 7;
  633.   {$EXTERNALSYM CBN_CLOSEUP}
  634.   CBN_CLOSEUP    = 8;
  635.   {$EXTERNALSYM CBN_SELENDOK}
  636.   CBN_SELENDOK   = 9;
  637.   {$EXTERNALSYM CBN_SELENDCANCEL}
  638.   CBN_SELENDCANCEL = 10;
  639.  
  640. { Combo Box messages }
  641.  
  642.   {$EXTERNALSYM CB_GETEDITSEL}
  643.   CB_GETEDITSEL            = $0140;
  644.   {$EXTERNALSYM CB_LIMITTEXT}
  645.   CB_LIMITTEXT             = $0141;
  646.   {$EXTERNALSYM CB_SETEDITSEL}
  647.   CB_SETEDITSEL            = $0142;
  648.   {$EXTERNALSYM CB_ADDSTRING}
  649.   CB_ADDSTRING             = $0143;
  650.   {$EXTERNALSYM CB_DELETESTRING}
  651.   CB_DELETESTRING          = $0144;
  652.   {$EXTERNALSYM CB_DIR}
  653.   CB_DIR                   = $0145;
  654.   {$EXTERNALSYM CB_GETCOUNT}
  655.   CB_GETCOUNT              = $0146;
  656.   {$EXTERNALSYM CB_GETCURSEL}
  657.   CB_GETCURSEL             = $0147;
  658.   {$EXTERNALSYM CB_GETLBTEXT}
  659.   CB_GETLBTEXT             = $0148;
  660.   {$EXTERNALSYM CB_GETLBTEXTLEN}
  661.   CB_GETLBTEXTLEN          = $0149;
  662.   {$EXTERNALSYM CB_INSERTSTRING}
  663.   CB_INSERTSTRING          = $014A;
  664.   {$EXTERNALSYM CB_RESETCONTENT}
  665.   CB_RESETCONTENT          = $014B;
  666.   {$EXTERNALSYM CB_FINDSTRING}
  667.   CB_FINDSTRING            = $014C;
  668.   {$EXTERNALSYM CB_SELECTSTRING}
  669.   CB_SELECTSTRING          = $014D;
  670.   {$EXTERNALSYM CB_SETCURSEL}
  671.   CB_SETCURSEL             = $014E;
  672.   {$EXTERNALSYM CB_SHOWDROPDOWN}
  673.   CB_SHOWDROPDOWN          = $014F;
  674.   {$EXTERNALSYM CB_GETITEMDATA}
  675.   CB_GETITEMDATA           = $0150;
  676.   {$EXTERNALSYM CB_SETITEMDATA}
  677.   CB_SETITEMDATA           = $0151;
  678.   {$EXTERNALSYM CB_GETDROPPEDCONTROLRECT}
  679.   CB_GETDROPPEDCONTROLRECT = $0152;
  680.   {$EXTERNALSYM CB_SETITEMHEIGHT}
  681.   CB_SETITEMHEIGHT         = $0153;
  682.   {$EXTERNALSYM CB_GETITEMHEIGHT}
  683.   CB_GETITEMHEIGHT         = $0154;
  684.   {$EXTERNALSYM CB_SETEXTENDEDUI}
  685.   CB_SETEXTENDEDUI         = $0155;
  686.   {$EXTERNALSYM CB_GETEXTENDEDUI}
  687.   CB_GETEXTENDEDUI         = $0156;
  688.   {$EXTERNALSYM CB_GETDROPPEDSTATE}
  689.   CB_GETDROPPEDSTATE       = $0157;
  690.   {$EXTERNALSYM CB_FINDSTRINGEXACT}
  691.   CB_FINDSTRINGEXACT       = $0158;
  692.   {$EXTERNALSYM CB_SETLOCALE}
  693.   CB_SETLOCALE             = 345;
  694.   {$EXTERNALSYM CB_GETLOCALE}
  695.   CB_GETLOCALE             = 346;
  696.   {$EXTERNALSYM CB_GETTOPINDEX}
  697.   CB_GETTOPINDEX           = 347;
  698.   {$EXTERNALSYM CB_SETTOPINDEX}
  699.   CB_SETTOPINDEX           = 348;
  700.   {$EXTERNALSYM CB_GETHORIZONTALEXTENT}
  701.   CB_GETHORIZONTALEXTENT   = 349;
  702.   {$EXTERNALSYM CB_SETHORIZONTALEXTENT}
  703.   CB_SETHORIZONTALEXTENT   = 350;
  704.   {$EXTERNALSYM CB_GETDROPPEDWIDTH}
  705.   CB_GETDROPPEDWIDTH       = 351;
  706.   {$EXTERNALSYM CB_SETDROPPEDWIDTH}
  707.   CB_SETDROPPEDWIDTH       = 352;
  708.   {$EXTERNALSYM CB_INITSTORAGE}
  709.   CB_INITSTORAGE           = 353;
  710.   {$EXTERNALSYM CB_MSGMAX}
  711.   CB_MSGMAX                = 354;
  712.  
  713. { Edit Control Notification Codes }
  714.  
  715. const
  716.   {$EXTERNALSYM EN_SETFOCUS}
  717.   EN_SETFOCUS  = $0100;
  718.   {$EXTERNALSYM EN_KILLFOCUS}
  719.   EN_KILLFOCUS = $0200;
  720.   {$EXTERNALSYM EN_CHANGE}
  721.   EN_CHANGE    = $0300;
  722.   {$EXTERNALSYM EN_UPDATE}
  723.   EN_UPDATE    = $0400;
  724.   {$EXTERNALSYM EN_ERRSPACE}
  725.   EN_ERRSPACE  = $0500;
  726.   {$EXTERNALSYM EN_MAXTEXT}
  727.   EN_MAXTEXT   = $0501;
  728.   {$EXTERNALSYM EN_HSCROLL}
  729.   EN_HSCROLL   = $0601;
  730.   {$EXTERNALSYM EN_VSCROLL}
  731.   EN_VSCROLL   = $0602;
  732.  
  733. { Edit Control Messages }
  734.  
  735. const
  736.   {$EXTERNALSYM EM_GETSEL}
  737.   EM_GETSEL              = $00B0;
  738.   {$EXTERNALSYM EM_SETSEL}
  739.   EM_SETSEL              = $00B1;
  740.   {$EXTERNALSYM EM_GETRECT}
  741.   EM_GETRECT             = $00B2;
  742.   {$EXTERNALSYM EM_SETRECT}
  743.   EM_SETRECT             = $00B3;
  744.   {$EXTERNALSYM EM_SETRECTNP}
  745.   EM_SETRECTNP           = $00B4;
  746.   {$EXTERNALSYM EM_SCROLL}
  747.   EM_SCROLL              = $00B5;
  748.   {$EXTERNALSYM EM_LINESCROLL}
  749.   EM_LINESCROLL          = $00B6;
  750.   {$EXTERNALSYM EM_SCROLLCARET}
  751.   EM_SCROLLCARET         = $00B7;
  752.   {$EXTERNALSYM EM_GETMODIFY}
  753.   EM_GETMODIFY           = $00B8;
  754.   {$EXTERNALSYM EM_SETMODIFY}
  755.   EM_SETMODIFY           = $00B9;
  756.   {$EXTERNALSYM EM_GETLINECOUNT}
  757.   EM_GETLINECOUNT        = $00BA;
  758.   {$EXTERNALSYM EM_LINEINDEX}
  759.   EM_LINEINDEX           = $00BB;
  760.   {$EXTERNALSYM EM_SETHANDLE}
  761.   EM_SETHANDLE           = $00BC;
  762.   {$EXTERNALSYM EM_GETHANDLE}
  763.   EM_GETHANDLE           = $00BD;
  764.   {$EXTERNALSYM EM_GETTHUMB}
  765.   EM_GETTHUMB            = $00BE;
  766.   {$EXTERNALSYM EM_LINELENGTH}
  767.   EM_LINELENGTH          = $00C1;
  768.   {$EXTERNALSYM EM_REPLACESEL}
  769.   EM_REPLACESEL          = $00C2;
  770.   {$EXTERNALSYM EM_GETLINE}
  771.   EM_GETLINE             = $00C4;
  772.   {$EXTERNALSYM EM_LIMITTEXT}
  773.   EM_LIMITTEXT           = $00C5;
  774.   {$EXTERNALSYM EM_CANUNDO}
  775.   EM_CANUNDO             = $00C6;
  776.   {$EXTERNALSYM EM_UNDO}
  777.   EM_UNDO                = $00C7;
  778.   {$EXTERNALSYM EM_FMTLINES}
  779.   EM_FMTLINES            = $00C8;
  780.   {$EXTERNALSYM EM_LINEFROMCHAR}
  781.   EM_LINEFROMCHAR        = $00C9;
  782.   {$EXTERNALSYM EM_SETTABSTOPS}
  783.   EM_SETTABSTOPS         = $00CB;
  784.   {$EXTERNALSYM EM_SETPASSWORDCHAR}
  785.   EM_SETPASSWORDCHAR     = $00CC;
  786.   {$EXTERNALSYM EM_EMPTYUNDOBUFFER}
  787.   EM_EMPTYUNDOBUFFER     = $00CD;
  788.   {$EXTERNALSYM EM_GETFIRSTVISIBLELINE}
  789.   EM_GETFIRSTVISIBLELINE = $00CE;
  790.   {$EXTERNALSYM EM_SETREADONLY}
  791.   EM_SETREADONLY         = $00CF;
  792.   {$EXTERNALSYM EM_SETWORDBREAKPROC}
  793.   EM_SETWORDBREAKPROC    = $00D0;
  794.   {$EXTERNALSYM EM_GETWORDBREAKPROC}
  795.   EM_GETWORDBREAKPROC    = $00D1;
  796.   {$EXTERNALSYM EM_GETPASSWORDCHAR}
  797.   EM_GETPASSWORDCHAR     = $00D2;
  798.   {$EXTERNALSYM EM_SETMARGINS}
  799.   EM_SETMARGINS          = 211;
  800.   {$EXTERNALSYM EM_GETMARGINS}
  801.   EM_GETMARGINS          = 212;
  802.   {$EXTERNALSYM EM_SETLIMITTEXT}
  803.   EM_SETLIMITTEXT        = EM_LIMITTEXT;    //win40 Name change
  804.   {$EXTERNALSYM EM_GETLIMITTEXT}
  805.   EM_GETLIMITTEXT        = 213;
  806.   {$EXTERNALSYM EM_POSFROMCHAR}
  807.   EM_POSFROMCHAR         = 214;
  808.   {$EXTERNALSYM EM_CHARFROMPOS}
  809.   EM_CHARFROMPOS         = 215;
  810.  
  811. const
  812.   { Scroll bar messages }
  813.   {$EXTERNALSYM SBM_SETPOS}
  814.   SBM_SETPOS = 224;             { not in win3.1  }
  815.   {$EXTERNALSYM SBM_GETPOS}
  816.   SBM_GETPOS = 225;             { not in win3.1  }
  817.   {$EXTERNALSYM SBM_SETRANGE}
  818.   SBM_SETRANGE = 226;           { not in win3.1  }
  819.   {$EXTERNALSYM SBM_SETRANGEREDRAW}
  820.   SBM_SETRANGEREDRAW = 230;     { not in win3.1  }
  821.   {$EXTERNALSYM SBM_GETRANGE}
  822.   SBM_GETRANGE = 227;           { not in win3.1  }
  823.   {$EXTERNALSYM SBM_ENABLE_ARROWS}
  824.   SBM_ENABLE_ARROWS = 228;      { not in win3.1  }
  825.   {$EXTERNALSYM SBM_SETSCROLLINFO}
  826.   SBM_SETSCROLLINFO = 233;
  827.   {$EXTERNALSYM SBM_GETSCROLLINFO}
  828.   SBM_GETSCROLLINFO = 234;
  829.  
  830. { Dialog messages }
  831.  
  832.   {$EXTERNALSYM DM_GETDEFID}
  833.   DM_GETDEFID = (WM_USER+0);
  834.   {$EXTERNALSYM DM_SETDEFID}
  835.   DM_SETDEFID = (WM_USER+1);
  836.   {$EXTERNALSYM DM_REPOSITION}
  837.   DM_REPOSITION = (WM_USER+2);
  838.  
  839.   {$EXTERNALSYM PSM_PAGEINFO}
  840.   PSM_PAGEINFO = (WM_USER+100);
  841.   {$EXTERNALSYM PSM_SHEETINFO}
  842.   PSM_SHEETINFO = (WM_USER+101);
  843.  
  844. type
  845.  
  846. { Generic window message record }
  847.  
  848.   PMessage = ^TMessage;
  849.   TMessage = record
  850.     Msg: Cardinal;
  851.     case Integer of
  852.       0: (
  853.         WParam: Longint;
  854.         LParam: Longint;
  855.         Result: Longint);
  856.       1: (
  857.         WParamLo: Word;
  858.         WParamHi: Word;
  859.         LParamLo: Word;
  860.         LParamHi: Word;
  861.         ResultLo: Word;
  862.         ResultHi: Word);
  863.   end;
  864.  
  865. { Common message format records }
  866.  
  867.   TWMNoParams = record
  868.     Msg: Cardinal;
  869.     Unused: array[0..3] of Word;
  870.     Result: Longint;
  871.   end;
  872.  
  873.   TWMKey = record
  874.     Msg: Cardinal;
  875.     CharCode: Word;
  876.     Unused: Word;
  877.     KeyData: Longint;
  878.     Result: Longint;
  879.   end;
  880.  
  881.   TWMMouse = record
  882.     Msg: Cardinal;
  883.     Keys: Longint;
  884.     case Integer of
  885.       0: (
  886.         XPos: Smallint;
  887.         YPos: Smallint);
  888.       1: (
  889.         Pos: TSmallPoint;
  890.         Result: Longint);
  891.   end;
  892.  
  893.   TWMWindowPosMsg = record
  894.     Msg: Cardinal;
  895.     Unused: Integer;
  896.     WindowPos: PWindowPos;
  897.     Result: Longint;
  898.   end;
  899.  
  900.   TWMScroll = record
  901.     Msg: Cardinal;
  902.     ScrollCode: Smallint; { SB_xxxx }
  903.     Pos: Smallint;
  904.     ScrollBar: HWND;
  905.     Result: Longint;
  906.   end;
  907.  
  908. { Message records }
  909.  
  910.   TWMActivate = record
  911.     Msg: Cardinal;
  912.     Active: Word; { WA_INACTIVE, WA_ACTIVE, WA_CLICKACTIVE }
  913.     Minimized: WordBool;
  914.     ActiveWindow: HWND;
  915.     Result: Longint;
  916.   end;
  917.  
  918.   TWMActivateApp = record
  919.     Msg: Cardinal;
  920.     Active: BOOL;
  921.     ThreadId: Longint;
  922.     Result: Longint;
  923.   end;
  924.  
  925.   TWMAskCBFormatName = record
  926.     Msg: Cardinal;
  927.     NameLen: Word;
  928.     Unused: Word;
  929.     FormatName: PChar;
  930.     Result: Longint;
  931.   end;
  932.  
  933.   TWMCancelMode = TWMNoParams;
  934.  
  935.   TWMChangeCBChain = record
  936.     Msg: Cardinal;
  937.     Remove: HWND;
  938.     Next: HWND;
  939.     Result: Longint;
  940.   end;
  941.  
  942.   TWMChar = TWMKey;
  943.  
  944.   TWMCharToItem = record
  945.     Msg: Cardinal;
  946.     Key: Word;
  947.     CaretPos: Word;
  948.     ListBox: HWND;
  949.     Result: Longint;
  950.   end;
  951.  
  952.   TWMChildActivate = TWMNoParams;
  953.  
  954.   TWMChooseFont_GetLogFont = record
  955.     Msg: Cardinal;
  956.     Unused: Longint;
  957.     LogFont: PLogFont;
  958.     Result: Longint;
  959.   end;
  960.  
  961.   TWMClear = TWMNoParams;
  962.   TWMClose = TWMNoParams;
  963.  
  964.   TWMCommand = record
  965.     Msg: Cardinal;
  966.     ItemID: Word;
  967.     NotifyCode: Word;
  968.     Ctl: HWND;
  969.     Result: Longint;
  970.   end;
  971.  
  972.   TWMCompacting = record
  973.     Msg: Cardinal;
  974.     CompactRatio: Longint;
  975.     Unused: Longint;
  976.     Result: Longint;
  977.   end;
  978.  
  979.   TWMCompareItem = record
  980.     Msg: Cardinal;
  981.     Ctl: HWnd;
  982.     CompareItemStruct: PCompareItemStruct;
  983.     Result: Longint;
  984.   end;
  985.  
  986.   TWMCopy = TWMNoParams;
  987.  
  988.   TWMCopyData = record
  989.     Msg: Cardinal;
  990.     From: HWND;
  991.     CopyDataStruct: PCopyDataStruct;
  992.     Result: Longint;
  993.   end;
  994.  
  995.   { ?? WM_CLP_LAUNCH, WM_CPL_LAUNCHED }
  996.  
  997.   TWMCreate = record
  998.     Msg: Cardinal;
  999.     Unused: Integer;
  1000.     CreateStruct: PCreateStruct;
  1001.     Result: Longint;
  1002.   end;
  1003.  
  1004.   TWMCtlColor = record
  1005.     Msg: Cardinal;
  1006.     ChildDC: HDC;
  1007.     ChildWnd: HWND;
  1008.     Result: Longint;
  1009.   end;
  1010.  
  1011.   TWMCtlColorBtn = TWMCtlColor;
  1012.   TWMCtlColorDlg = TWMCtlColor;
  1013.   TWMCtlColorEdit = TWMCtlColor;
  1014.   TWMCtlColorListbox = TWMCtlColor;
  1015.   TWMCtlColorMsgbox = TWMCtlColor;
  1016.   TWMCtlColorScrollbar = TWMCtlColor;
  1017.   TWMCtlColorStatic = TWMCtlColor;
  1018.  
  1019.   TWMCut = TWMNoParams;
  1020.  
  1021.   TWMDDE_Ack = record
  1022.     Msg: Cardinal;
  1023.     PostingApp: HWND;
  1024.     case Word of
  1025.       WM_DDE_INITIATE: (
  1026.         App: Word;
  1027.         Topic: Word;
  1028.         Result: Longint);
  1029.       WM_DDE_EXECUTE {and all others}: (
  1030.         PackedVal: Longint);
  1031.   end;
  1032.  
  1033.   TWMDDE_Advise = record
  1034.     Msg: Cardinal;
  1035.     PostingApp: HWND;
  1036.     PackedVal: Longint;
  1037.     Result: Longint;
  1038.   end;
  1039.  
  1040.   TWMDDE_Data = record
  1041.     Msg: Cardinal;
  1042.     PostingApp: HWND;
  1043.     PackedVal: Longint;
  1044.     Result: Longint;
  1045.   end;
  1046.  
  1047.   TWMDDE_Execute = record
  1048.     Msg: Cardinal;
  1049.     PostingApp: HWND;
  1050.     Commands: THandle;
  1051.     Result: Longint;
  1052.   end;
  1053.  
  1054.   TWMDDE_Initiate = record
  1055.     Msg: Cardinal;
  1056.     PostingApp: HWND;
  1057.     App: Word;
  1058.     Topic: Word;
  1059.     Result: Longint;
  1060.   end;
  1061.  
  1062.   TWMDDE_Poke = record
  1063.     Msg: Cardinal;
  1064.     PostingApp: HWND;
  1065.     PackedVal: Longint;
  1066.     Result: Longint;
  1067.   end;
  1068.  
  1069.   TWMDDE_Request = record
  1070.     Msg: Cardinal;
  1071.     PostingApp: HWND;
  1072.     Format: Word;
  1073.     Item: Word;
  1074.     Result: Longint;
  1075.   end;
  1076.  
  1077.   TWMDDE_Terminate = record
  1078.     Msg: Cardinal;
  1079.     PostingApp: HWND;
  1080.     Unused: Longint;
  1081.     Result: Longint;
  1082.   end;
  1083.  
  1084.   TWMDDE_Unadvise = record
  1085.     Msg: Cardinal;
  1086.     PostingApp: HWND;
  1087.     Format: Word;
  1088.     Item: Word;
  1089.     Result: Longint;
  1090.   end;
  1091.  
  1092.   TWMDeadChar = TWMChar;
  1093.  
  1094.   TWMDeleteItem = record
  1095.     Msg: Cardinal;
  1096.     Ctl: HWND;
  1097.     DeleteItemStruct: PDeleteItemStruct;
  1098.     Result: Longint;
  1099.   end;
  1100.  
  1101.   TWMDestroy = TWMNoParams;
  1102.   TWMDestroyClipboard = TWMNoParams;
  1103.  
  1104.   TWMDevModeChange = record
  1105.     Msg: Cardinal;
  1106.     Unused: Integer;
  1107.     Device: PChar;
  1108.     Result: Longint;
  1109.   end;
  1110.  
  1111.   TWMDrawClipboard = TWMNoParams;
  1112.  
  1113.   TWMDrawItem = record
  1114.     Msg: Cardinal;
  1115.     Ctl: HWND;
  1116.     DrawItemStruct: PDrawItemStruct;
  1117.     Result: Longint;
  1118.   end;
  1119.  
  1120.   TWMDropFiles = record
  1121.     Msg: Cardinal;
  1122.     Drop: THANDLE;
  1123.     Unused: Longint;
  1124.     Result: Longint;
  1125.   end;
  1126.  
  1127.   TWMEnable = record
  1128.     Msg: Cardinal;
  1129.     Enabled: LongBool;
  1130.     Unused: Longint;
  1131.     Result: Longint;
  1132.   end;
  1133.  
  1134.   TWMEndSession = record
  1135.     Msg: Cardinal;
  1136.     EndSession: LongBool;
  1137.     Unused: Longint;
  1138.     Result: Longint;
  1139.   end;
  1140.  
  1141.   TWMEnterIdle = record
  1142.     Msg: Cardinal;
  1143.     Source: Longint; { MSGF_DIALOGBOX, MSGF_MENU }
  1144.     IdleWnd: HWND;
  1145.     Result: Longint;
  1146.   end;
  1147.  
  1148.   TWMEnterMenuLoop = record
  1149.     Msg: Cardinal;
  1150.     IsTrackPopupMenu: LongBool;
  1151.     Unused: Longint;
  1152.     Result: Longint;
  1153.   end;
  1154.  
  1155.   TWMExitMenuLoop = TWMEnterMenuLoop;
  1156.  
  1157.   TWMEraseBkgnd = record
  1158.     Msg: Cardinal;
  1159.     DC: HDC;
  1160.     Unused: Longint;
  1161.     Result: Longint;
  1162.   end;
  1163.  
  1164.   TWMFontChange = TWMNoParams;
  1165.   TWMGetDlgCode = TWMNoParams;
  1166.   TWMGetFont = TWMNoParams;
  1167.  
  1168.   TWMGetIcon = record
  1169.     Msg: Cardinal;
  1170.     BigIcon: Longbool;
  1171.     Unused: Longint;
  1172.     Result: Longint;
  1173.   end;
  1174.  
  1175.   TWMGetHotKey = TWMNoParams;
  1176.  
  1177.   TWMGetMinMaxInfo = record
  1178.     Msg: Cardinal;
  1179.     Unused: Integer;
  1180.     MinMaxInfo: PMinMaxInfo;
  1181.     Result: Longint;
  1182.   end;
  1183.  
  1184.   TWMGetText = record
  1185.     Msg: Cardinal;
  1186.     TextMax: Integer;
  1187.     Text: PChar;
  1188.     Result: Longint;
  1189.   end;
  1190.  
  1191.   TWMGetTextLength = TWMNoParams;
  1192.  
  1193.   TWMHotKey = record
  1194.     Msg: Cardinal;
  1195.     HotKey: Longint;
  1196.     Unused: Longint;
  1197.     Result: Longint;
  1198.   end;
  1199.  
  1200.   TWMHScroll = TWMScroll;
  1201.  
  1202.   TWMHScrollClipboard = record
  1203.     Msg: Cardinal;
  1204.     Viewer: HWND;
  1205.     ScrollCode: Word; {SB_BOTTOM, SB_ENDSCROLL, SB_LINEDOWN, SB_LINEUP,
  1206.                        SB_PAGEDOWN, SB_PAGEUP, SB_THUMBPOSITION,
  1207.                        SB_THUMBTRACK, SB_TOP }
  1208.     Pos: Word;
  1209.     Result: Longint;
  1210.   end;
  1211.  
  1212.   TWMIconEraseBkgnd = TWMEraseBkgnd;
  1213.  
  1214.   TWMInitDialog = record
  1215.     Msg: Cardinal;
  1216.     Focus: HWND;
  1217.     InitParam: Longint;
  1218.     Result: Longint;
  1219.   end;
  1220.  
  1221.   TWMInitMenu = record
  1222.     Msg: Cardinal;
  1223.     Menu: HMENU;
  1224.     Unused: Longint;
  1225.     Result: Longint;
  1226.   end;
  1227.  
  1228.   TWMInitMenuPopup = record
  1229.     Msg: Cardinal;
  1230.     MenuPopup: HMENU;
  1231.     Pos: Smallint;
  1232.     SystemMenu: WordBool;
  1233.     Result: Longint;
  1234.   end;
  1235.  
  1236.   TWMKeyDown = TWMKey;
  1237.   TWMKeyUp = TWMKey;
  1238.  
  1239.   TWMKillFocus = record
  1240.     Msg: Cardinal;
  1241.     FocusedWnd: HWND;
  1242.     Unused: Longint;
  1243.     Result: Longint;
  1244.   end;
  1245.  
  1246.   TWMLButtonDblClk = TWMMouse;
  1247.   TWMLButtonDown   = TWMMouse;
  1248.   TWMLButtonUp     = TWMMouse;
  1249.   TWMMButtonDblClk = TWMMouse;
  1250.   TWMMButtonDown   = TWMMouse;
  1251.   TWMMButtonUp     = TWMMouse;
  1252.  
  1253.   TWMMDIActivate = record
  1254.     Msg: Cardinal;
  1255.     case Integer of
  1256.       0: (
  1257.         ChildWnd: HWND);
  1258.       1: (
  1259.         DeactiveWnd: HWND;
  1260.         ActiveWnd: HWND;
  1261.         Result: Longint);
  1262.   end;
  1263.  
  1264.   TWMMDICascade = record
  1265.     Msg: Cardinal;
  1266.     Cascade: Longint; { 0, MDITILE_SKIPDISABLED }
  1267.     Unused: Longint;
  1268.     Result: Longint;
  1269.   end;
  1270.  
  1271.   TWMMDICreate = record
  1272.     Msg: Cardinal;
  1273.     Unused: Integer;
  1274.     MDICreateStruct: PMDICreateStruct;
  1275.     Result: Longint;
  1276.   end;
  1277.  
  1278.   TWMMDIDestroy = record
  1279.     Msg: Cardinal;
  1280.     Child: HWND;
  1281.     Unused: Longint;
  1282.     Result: Longint;
  1283.   end;
  1284.  
  1285.   TWMMDIGetActive = TWMNoParams;
  1286.   TWMMDIIconArrange = TWMNoParams;
  1287.  
  1288.   TWMMDIMaximize = record
  1289.     Msg: Cardinal;
  1290.     Maximize: HWND;
  1291.     Unused: Longint;
  1292.     Result: Longint;
  1293.   end;
  1294.  
  1295.   TWMMDINext = record
  1296.     Msg: Cardinal;
  1297.     Child: HWND;
  1298.     Next: Longint;
  1299.     Result: Longint;
  1300.   end;
  1301.  
  1302.   TWMMDIRefreshMenu = TWMNoParams;
  1303.  
  1304.   TWMMDIRestore = record
  1305.     Msg: Cardinal;
  1306.     IDChild: HWND;
  1307.     Unused: Longint;
  1308.     Result: Longint;
  1309.   end;
  1310.  
  1311.   TWMMDISetMenu = record
  1312.     Msg: Cardinal;
  1313.     MenuFrame: HMENU;
  1314.     MenuWindow: HMENU;
  1315.     Result: Longint;
  1316.   end;
  1317.  
  1318.   TWMMDITile = record
  1319.     Msg: Cardinal;
  1320.     Tile: Longint; { MDITILE_HORIZONTAL, MDITILE_SKIPDISABLE,
  1321.                      MDITILE_VERTICAL }
  1322.     Unused: Longint;
  1323.     Result: Longint;
  1324.   end;
  1325.  
  1326.   TWMMeasureItem = record
  1327.     Msg: Cardinal;
  1328.     IDCtl: HWnd;
  1329.     MeasureItemStruct: PMeasureItemStruct;
  1330.     Result: Longint;
  1331.   end;
  1332.  
  1333.   TWMMenuChar = record
  1334.     Msg: Cardinal;
  1335.     User: Char;
  1336.     Unused: Byte;
  1337.     MenuFlag: Word; { MF_POPUP, MF_SYSMENU }
  1338.     Menu: HMENU;
  1339.     Result: Longint;
  1340.   end;
  1341.  
  1342.   TWMMenuSelect = record
  1343.     Msg: Cardinal;
  1344.     IDItem: Word;
  1345.     MenuFlag: Word; { MF_BITMAP, MF_CHECKED, MF_DISABLED, MF_GRAYED,
  1346.                       MF_MOUSESELECT, MF_OWNERDRAW, MF_POPUP, MF_SEPARATOR,
  1347.                       MF_SYSMENU }
  1348.     Menu: HMENU;
  1349.     Result: Longint;
  1350.   end;
  1351.  
  1352.   TWMMouseActivate = record
  1353.     Msg: Cardinal;
  1354.     TopLevel: HWND;
  1355.     HitTestCode: Word;
  1356.     MouseMsg: Word;
  1357.     Result: Longint;
  1358.   end;
  1359.  
  1360.   TWMMouseMove = TWMMouse;
  1361.  
  1362.   TWMMove = record
  1363.     Msg: Cardinal;
  1364.     Unused: Integer;
  1365.     case Integer of
  1366.       0: (
  1367.         XPos: Smallint;
  1368.         YPos: Smallint);
  1369.       1: (
  1370.         Pos: TSmallPoint;
  1371.         Result: Longint);
  1372.   end;
  1373.  
  1374.   TWMNCActivate = record
  1375.     Msg: Cardinal;
  1376.     Active: BOOL;
  1377.     Unused: Longint;
  1378.     Result: Longint;
  1379.   end;
  1380.  
  1381.   TWMNCCalcSize = record
  1382.     Msg: Cardinal;
  1383.     CalcValidRects: BOOL;
  1384.     CalcSize_Params: PNCCalcSizeParams;
  1385.     Result: Longint;
  1386.   end;
  1387.  
  1388.   TWMNCCreate = record
  1389.     Msg: Cardinal;
  1390.     Unused: Integer;
  1391.     CreateStruct: PCreateStruct;
  1392.     Result: Longint;
  1393.   end;
  1394.  
  1395.   TWMNCDestroy = TWMNoParams;
  1396.  
  1397.   TWMNCHitTest = record
  1398.     Msg: Cardinal;
  1399.     Unused: Longint;
  1400.     case Integer of
  1401.       0: (
  1402.         XPos: Smallint;
  1403.         YPos: Smallint);
  1404.       1: (
  1405.         Pos: TSmallPoint;
  1406.         Result: Longint);
  1407.   end;
  1408.  
  1409.   TWMNCHitMessage = record
  1410.     Msg: Cardinal;
  1411.     HitTest: Longint;
  1412.     XCursor: Smallint;
  1413.     YCursor: Smallint;
  1414.     Result: Longint;
  1415.   end;
  1416.  
  1417.   TWMNCLButtonDblClk = TWMNCHitMessage;
  1418.   TWMNCLButtonDown   = TWMNCHitMessage;
  1419.   TWMNCLButtonUp     = TWMNCHitMessage;
  1420.   TWMNCMButtonDblClk = TWMNCHitMessage;
  1421.   TWMNCMButtonDown   = TWMNCHitMessage;
  1422.   TWMNCMButtonUp     = TWMNCHitMessage;
  1423.   TWMNCMouseMove     = TWMNCHitMessage;
  1424.  
  1425.   TWMNCPaint = TWMNoParams;
  1426.  
  1427.   TWMNCRButtonDblClk = TWMNCHitMessage;
  1428.   TWMNCRButtonDown   = TWMNCHitMessage;
  1429.   TWMNCRButtonUp     = TWMNCHitMessage;
  1430.  
  1431.   TWMNextDlgCtl = record
  1432.     Msg: Cardinal;
  1433.     CtlFocus: Longint;
  1434.     Handle: WordBool;
  1435.     Unused: Word;
  1436.     Result: Longint;
  1437.   end;
  1438.  
  1439.   TWMNotify = record
  1440.     Msg: Cardinal;
  1441.     IDCtrl: Longint;
  1442.     NMHdr: PNMHdr;
  1443.     Result: Longint;
  1444.   end;
  1445.            
  1446.   TWMNotifyFormat = record
  1447.     Msg: Cardinal;
  1448.     From: HWND;
  1449.     Command: Longint;
  1450.     Result: Longint;
  1451.   end;
  1452.  
  1453.   TWMPaint = record
  1454.     Msg: Cardinal;
  1455.     DC: HDC;
  1456.     Unused: Longint;
  1457.     Result: Longint;
  1458.   end;
  1459.  
  1460.   TWMPaintClipboard = record
  1461.     Msg: Cardinal;
  1462.     Viewer: HWND;
  1463.     PaintStruct: THandle;
  1464.     Result: Longint;
  1465.   end;
  1466.  
  1467.   TWMPaintIcon = TWMNoParams;
  1468.  
  1469.   TWMPaletteChanged = record
  1470.     Msg: Cardinal;
  1471.     PalChg: HWND;
  1472.     Unused: Longint;
  1473.     Result: Longint;
  1474.   end;
  1475.  
  1476.   TWMPaletteIsChanging = record
  1477.     Msg: Cardinal;
  1478.     Realize: HWND;
  1479.     Unused: Longint;
  1480.     Result: Longint;
  1481.   end;
  1482.  
  1483.   TWMParentNotify = record
  1484.     Msg: Cardinal;
  1485.     case Event: Word of
  1486.       WM_CREATE, WM_DESTROY: (
  1487.         ChildID: Word;
  1488.         ChildWnd: HWnd);
  1489.       WM_LBUTTONDOWN, WM_MBUTTONDOWN, WM_RBUTTONDOWN: (
  1490.         Value: Word;
  1491.         XPos: Smallint;
  1492.         YPos: Smallint);
  1493.       0: (
  1494.         Value1: Word;
  1495.         Value2: Longint;
  1496.         Result: Longint);
  1497.   end;
  1498.  
  1499.   TWMPaste = TWMNoParams;
  1500.  
  1501.   TWMPower = record
  1502.     Msg: Cardinal;
  1503.     PowerEvt: Longint; { PWR_SUSPENDREQUEST, PWR_SUSPENDRESUME,
  1504.                          PWR_CRITICALRESUME }
  1505.     Unused: Longint;
  1506.     Result: Longint;
  1507.   end;
  1508.  
  1509.   TWMQueryDragIcon = TWMNoParams;
  1510.  
  1511.   TWMQueryEndSession = record
  1512.     Msg: Cardinal;
  1513.     Source: Longint;
  1514.     Unused: Longint;
  1515.     Result: Longint;
  1516.   end;
  1517.  
  1518.   TWMQueryNewPalette = TWMNoParams;
  1519.   TWMQueryOpen = TWMNoParams;
  1520.   TWMQueueSync = TWMNoParams;
  1521.  
  1522.   TWMQuit = record
  1523.     Msg: Cardinal;
  1524.     ExitCode: Longint;
  1525.     Unused: Longint;
  1526.     Result: Longint;
  1527.   end;
  1528.  
  1529.   TWMRButtonDblClk = TWMMouse;
  1530.   TWMRButtonDown = TWMMouse;
  1531.   TWMRButtonUp = TWMMouse;
  1532.  
  1533.   TWMRenderAllFormats = TWMNoParams;
  1534.  
  1535.   TWMRenderFormat = record
  1536.     Msg: Cardinal;
  1537.     Format: Longint;
  1538.     Unused: Longint;
  1539.     Result: Longint;
  1540.   end;
  1541.  
  1542.   TWMSetCursor = record
  1543.     Msg: Cardinal;
  1544.     CursorWnd: HWND;
  1545.     HitTest: Word;
  1546.     MouseMsg: Word;
  1547.     Result: Longint;
  1548.   end;
  1549.  
  1550.   TWMSetFocus = record
  1551.     Msg: Cardinal;
  1552.     FocusedWnd: HWND;
  1553.     Unused: Longint;
  1554.     Result: Longint;
  1555.   end;
  1556.  
  1557.   TWMSetFont = record
  1558.     Msg: Cardinal;
  1559.     Font: HFONT;
  1560.     Redraw: WordBool;
  1561.     Unused: Word;
  1562.     Result: Longint;
  1563.   end;
  1564.  
  1565.   TWMSetHotKey = record
  1566.     Msg: Cardinal;
  1567.     Key: Longint;
  1568.     Unused: Longint;
  1569.     Result: Longint;
  1570.   end;
  1571.  
  1572.   TWMSetIcon = record
  1573.     Msg: Cardinal;
  1574.     BigIcon: Longbool;
  1575.     Icon: HICON;
  1576.     Result: Longint;
  1577.   end;
  1578.  
  1579.   TWMSetRedraw = record
  1580.     Msg: Cardinal;
  1581.     Redraw: Longint;
  1582.     Unused: Longint;
  1583.     Result: Longint;
  1584.   end;
  1585.  
  1586.   TWMSetText = record
  1587.     Msg: Cardinal;
  1588.     Unused: Longint;
  1589.     Text: PChar;
  1590.     Result: Longint;
  1591.   end;
  1592.  
  1593.   TWMShowWindow = record
  1594.     Msg: Cardinal;
  1595.     Show: BOOL;
  1596.     Status: Longint;
  1597.     Result: Longint;
  1598.   end;
  1599.  
  1600.   TWMSize = record
  1601.     Msg: Cardinal;
  1602.     SizeType: Longint; { SIZE_MAXIMIZED, SIZE_MINIMIZED, SIZE_RESTORED,
  1603.                          SIZE_MAXHIDE, SIZE_MAXSHOW }
  1604.     Width: Word;
  1605.     Height: Word;
  1606.     Result: Longint;
  1607.   end;
  1608.  
  1609.   TWMSizeClipboard = record
  1610.     Msg: Cardinal;
  1611.     Viewer: HWND;
  1612.     RC: THandle;
  1613.     Result: Longint;
  1614.   end;
  1615.  
  1616.   TWMSpoolerStatus = record
  1617.     Msg: Cardinal;
  1618.     JobStatus: Longint;
  1619.     JobsLeft: Word;
  1620.     Unused: Word;
  1621.     Result: Longint;
  1622.   end;
  1623.  
  1624.   TWMStyleChange = record
  1625.     Msg: Cardinal;
  1626.     StyleType: Longint;
  1627.     StyleStruct: PStyleStruct;
  1628.     Result: Longint;
  1629.   end;
  1630.  
  1631.   TWMStyleChanged = TWMStyleChange;
  1632.   TWMStyleChanging = TWMStyleChange;
  1633.  
  1634.   TWMSysChar = TWMKey;
  1635.   TWMSysColorChange = TWMNoParams;
  1636.  
  1637.   TWMSysCommand = record
  1638.     Msg: Cardinal;
  1639.     case CmdType: Longint of
  1640.       SC_HOTKEY: (
  1641.         ActivateWnd: HWND);
  1642.       SC_KEYMENU: (
  1643.         Key: Word);
  1644.       SC_CLOSE, SC_HSCROLL, SC_MAXIMIZE, SC_MINIMIZE, SC_MOUSEMENU, SC_MOVE,
  1645.       SC_NEXTWINDOW, SC_PREVWINDOW, SC_RESTORE, SC_SCREENSAVE, SC_SIZE,
  1646.       SC_TASKLIST, SC_VSCROLL: (
  1647.         XPos: Smallint;
  1648.         YPos: Smallint;
  1649.         Result: Longint);
  1650.   end;
  1651.  
  1652.   TWMSysDeadChar = record
  1653.     Msg: Cardinal;
  1654.     CharCode: Word;
  1655.     Unused: Word;
  1656.     KeyData: Longint;
  1657.     Result: Longint;
  1658.   end;
  1659.  
  1660.   TWMSysKeyDown = TWMKey;
  1661.   TWMSysKeyUp = TWMKey;
  1662.  
  1663.   TWMSystemError = record
  1664.     Msg: Cardinal;
  1665.     ErrSpec: Word;
  1666.     Unused: Longint;
  1667.     Result: Longint;
  1668.   end;
  1669.  
  1670.   TWMTimeChange = TWMNoParams;
  1671.  
  1672.   TWMTimer = record
  1673.     Msg: Cardinal;
  1674.     TimerID: Longint;
  1675.     TimerProc: TFarProc;
  1676.     Result: Longint;
  1677.   end;
  1678.  
  1679.   TWMUndo = TWMNoParams;
  1680.  
  1681.   TWMVKeyToItem = TWMCharToItem;
  1682.  
  1683.   TWMVScroll = TWMScroll;
  1684.  
  1685.   TWMVScrollClipboard = record
  1686.     Msg: Cardinal;
  1687.     Viewer: HWND;
  1688.     ScollCode: Word;
  1689.     ThumbPos: Word;
  1690.     Result: Longint;
  1691.   end;
  1692.  
  1693.   TWMWindowPosChanged = TWMWindowPosMsg;
  1694.   TWMWindowPosChanging = TWMWindowPosMsg;
  1695.  
  1696.   TWMWinIniChange = record
  1697.     Msg: Cardinal;
  1698.     Unused: Integer;
  1699.     Section: PChar;
  1700.     Result: Longint;
  1701.   end;
  1702.  
  1703.   TWMHelp = record
  1704.     Msg: Cardinal;
  1705.     Unused: Integer;
  1706.     HelpInfo: PHelpInfo;
  1707.     Result: Longint;
  1708.   end;
  1709.  
  1710.   TWMDisplayChange = record
  1711.     Msg: Cardinal;
  1712.     BitsPerPixel: Integer;
  1713.     Width: Word;
  1714.     Height: Word;
  1715.   end;
  1716.  
  1717. implementation
  1718.  
  1719. end.
  1720.